home *** CD-ROM | disk | FTP | other *** search
/ Aminet 6 / Aminet 6 - June 1995.iso / Aminet / dev / e / capus2.lha / capus2 / 3DView / Executables / Install-3DView < prev    next >
Encoding:
Text File  |  1995-03-24  |  4.5 KB  |  178 lines
  1. ; =======================================
  2. ; $VER: Install-3DView v0.1 © 1995 NasGûl
  3. ; =======================================
  4. (complete 0)
  5. ; =============
  6. ; French string
  7. ; =============
  8. (if ( = @language "français")
  9. (
  10.     (set #bad-kick
  11.     (cat "OS 2.X Uniquement."
  12.     ))
  13.     (set #intro
  14.     (cat "Installation de:\n"
  15.          " - 3DView.\n"
  16.          " - Libs:reqtools.library.\n"
  17.          "(Vous devez faire l'installation en mode EXPERT ou INITIE).\n"
  18.     ))
  19.     ; >>>>>> 3Dview String
  20.     (set #dir3dview
  21.     (cat "Choisissez le dossier de destination de 3DView."
  22.     ))
  23.     (set #help-dir3dview
  24.     (cat "Vous pouvez mettre 3Dview ou vous voulez.\n"
  25.     ))
  26.     (set #copy3dview
  27.     (cat "Installation de 3DView."
  28.     ))
  29.     ; >>>>>> reqtools.library string
  30.     (set #reqtoolsprompt
  31.     (cat "Installation de la reqtools.library."
  32.     ))
  33.     ; >>>>>> Guide String
  34.     (set #dirguide
  35.     (cat "Les docs sont au format AmigaGuide,le fichier 3DViewSources.Guide est "
  36.          "un descriptif des sources.\n"
  37.     ))
  38.     (set #help-dirguide
  39.     (cat "Vous pouvez mettre la documentation ou bon vous semble."
  40.     ))
  41.     (set #copyguide
  42.     (cat "Installation des Guides."
  43.     ))
  44.     ; >>>>>> Extras String
  45.     (set #choixextras_prompt
  46.     (cat "Installation des Extras."
  47.     ))
  48.     (set #choixextras_help
  49.     (cat "Installation des sources E.\n"
  50.          "--------------------------\n"
  51.          "Installe les sources de 3DView plus quelques modules.\n"
  52.     ))
  53.     (set #extras_1
  54.     (cat "Installation des sources E."
  55.     ))
  56.     (set #extras_1_help
  57.     (cat "Je vous conseille de créer un dossier avant d'installer les "
  58.          "sources.2 archives seront copiées, (Modules.lha) et (Pmodules.Lha), "
  59.          "elles sont indispensable pour la compilation de 3DView.\n"
  60.          "Je ne les ai pas désarchivées car elles contiennent d'autres "
  61.          "modules (opal.m Vmem.m),je laisse donc le soin a l'utilisateur "
  62.          "d'installer que se qui lui faut et surtout de savoir les fichiers "
  63.          "installés."
  64.     ))
  65.     (set #endscript
  66.     (cat "»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»\n"
  67.          "»» reqtools.library  © Nico François          »»\n"
  68.          "»» GoldED            © Dietmar Eilert         »»\n"
  69.          "»» Arexx             © Williams S. Hawes      »»\n"
  70.          "»» AmigaE            © Wouter Van Oortmerssen »»\n"
  71.          "»» Amiga             © Commodore              »»\n"
  72.          "»» 3DView            © NasGûl                 »»\n"
  73.          "»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»"
  74.     ))
  75. ))
  76.  
  77. (user 2)
  78. (message #intro)
  79. (welcome)
  80.  
  81. ; ========
  82. ; 3DView
  83. ; ========
  84. ; ========================
  85. ; Installation de 3DView
  86. ; ========================
  87. (set @destdir
  88.     (askdir
  89.         (prompt #dir3dview)
  90.         (help   #help-dir3dview)
  91.         (default "Ram:")
  92.     )
  93. )
  94. (set @default-dest @destdir)
  95. (copyfiles
  96.     (prompt #copy3dview)
  97.     (help @copyfiles-help)
  98.     (source "")
  99.     (dest @destdir)
  100.     (choices "3DView" "3DView.info")
  101.     (confirm)
  102. )
  103. (complete 33)
  104. ; ===================================
  105. ; Installation de la reqtools.library
  106. ; ===================================
  107. (message #reqtoolsprompt)
  108. (copylib
  109.     (prompt #preqtoolsprompt)
  110.     (help   @copylib-help)
  111.     (source "libs/reqtools.library")
  112.     (dest   "Libs:")
  113.     (confirm)
  114.     (optional nofail askuser)
  115. )
  116. (complete 66)
  117. ; =====================
  118. ; Installation des Docs
  119. ; =====================
  120. (complete 0)
  121. (set @destdir
  122.     (askdir
  123.         (prompt #dirguide)
  124.         (help   #help-dirguide)
  125.         (default "Ram:")
  126.     )
  127. )
  128. ;(set @default-dest @destdir)
  129. (copyfiles
  130.     (prompt #copyguide)
  131.     (help @copyfiles-help)
  132.     (source "/Docs/")
  133.     (dest @destdir)
  134.     (choices "3DView.Guide" "3DView.Guide.info"
  135.              "3DViewSources.Guide" "3DViewSources.Guide.info")
  136.     (confirm)
  137. )
  138. (complete 100)
  139. ; =======================
  140. ; Installation des Extras
  141. ; =======================
  142. (complete 0)
  143. (set choix
  144.     (askoptions
  145.         (prompt  #choixextras_prompt)
  146.         (help    #choixextras_help)
  147.         (choices #extras_1)
  148.     )
  149. )
  150. ; ==========================
  151. ; Installation des sources E
  152. ; ==========================
  153. (if
  154.     (BITAND choix 1)
  155.         ((set @destdir
  156.             (cat
  157.                 (askdir
  158.                     (prompt #extras_1)
  159.                     (help   #extras_1_help)
  160.                     (default "Ram:")
  161.                 )
  162.             )
  163.         )
  164.         (copyfiles
  165.             (prompt #extras_1)
  166.             (help   #extras_1_help)
  167.             (source "/Sources/")
  168.             (dest   @destdir)
  169.             (pattern "#?")
  170.         ))
  171. )
  172. (complete 100)
  173. (message #endscript)
  174.  
  175.  
  176.  
  177.  
  178.